package com.rpframework.utils;

import com.google.gson.Gson;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import java.io.File;
import java.io.IOException;
import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * 包工具类
 *
 * @author 刘兴
 */
public class PackageUtils {
    private static final Logger log = LoggerFactory.getLogger(PackageUtils.class);

    /**
     * 从包package中获取所有的Class
     *
     * @param pack 包路径
     * @return 扫描类
     */
    private static Set<Class<?>> scanClasses(String pack, Class<?>[] extendsClass) {
        Set<Class<?>> classes = scanClasses(pack);
        if (extendsClass != null && extendsClass.length > 0) {
            Iterator<Class<?>> iterator = classes.iterator();
            while (iterator.hasNext()) {
                Class<?> classOne = iterator.next();
                Class<?> superclass = classOne.getSuperclass();
                if (superclass != null) {
                    boolean is = false;
                    for (Class<?> classExtend : extendsClass) {
                        if (superclass.equals(classExtend)) {
                            is = true;
                            break;
                        }
                    }
                    if (!is) {
                        iterator.remove();
                    }
                } else {
                    iterator.remove();
                }
            }
        }
        return classes;
    }

    /**
     * 从包package中获取所有的Class
     *
     * @param pack 包路径
     * @return 类集合
     */
    public static Set<Class<?>> scanClasses(String pack) {
        return scanClasses(pack, true);
    }

    /**
     * 从包package中获取所有的Class
     *
     * @param pack      包路径
     * @param recursive 是否循环迭代
     * @return 类集合
     */
    private static Set<Class<?>> scanClasses(String pack, boolean recursive) {
        // 第一个class类的集合
        Set<Class<?>> classes = new LinkedHashSet<>();
        // 是否循环迭代
        // 获取包的名字 并进行替换
        String packageName = pack;
        String packageDirName = packageName.replace('.', '/');
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
            // 循环迭代下去
            while (dirs.hasMoreElements()) {
                // 获取下一个元素
                URL url = dirs.nextElement();
                // 得到协议的名称
                String protocol = url.getProtocol();
                // 如果是以文件的形式保存在服务器上
                if ("file".equals(protocol)) {
                    // 获取包的物理路径
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                    // 以文件的方式扫描整个包下的文件 并添加到集合中
                    findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
                } else if ("jar".equals(protocol)) {
                    // 如果是jar包文件
                    // 定义一个JarFile
                    JarFile jar;
                    try {
                        // 获取jar
                        jar = ((JarURLConnection) url.openConnection()).getJarFile();
                        // 从此jar包 得到一个枚举类
                        Enumeration<JarEntry> entries = jar.entries();
                        // 同样的进行循环迭代
                        while (entries.hasMoreElements()) {
                            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                            JarEntry entry = entries.nextElement();
                            String name = entry.getName();
                            // 如果是以/开头的
                            if (name.charAt(0) == '/') {
                                // 获取后面的字符串
                                name = name.substring(1);
                            }
                            // 如果前半部分和定义的包名相同
                            if (name.startsWith(packageDirName)) {
                                int idx = name.lastIndexOf('/');
                                // 如果以"/"结尾 是一个包
                                if (idx != -1) {
                                    // 获取包名 把"/"替换成"."
                                    packageName = name.substring(0, idx).replace('/', '.');
                                }
                                // 如果可以迭代下去 并且是一个包
                                if ((idx != -1) || recursive) {
                                    // 如果是一个.class文件 而且不是目录
                                    if (name.endsWith(".class") && !entry.isDirectory()) {
                                        // 去掉后面的".class" 获取真正的类名
                                        String className = name.substring(packageName.length() + 1, name.length() - 6);
                                        try {
                                            // 添加到classes
                                            classes.add(Class.forName(packageName + '.' + className));
                                        } catch (ClassNotFoundException e) {
                                            // log
                                            // .error("添加用户自定义视图类错误
                                            // 找不到此类的.class文件");
                                            throw new RuntimeException(e);
                                        }
                                    }
                                }
                            }
                        }
                    } catch (IOException e) {
                        throw new RuntimeException(e);
                    }
                }
            }
        } catch (IOException e) {
            throw new RuntimeException(e);
        }
        return classes;
    }


    /**
     * 从包package中获取所有的Class
     *
     * @param packages 包路径
     * @return MAP
     */
    private static Map<String, Map<String, Map<String, Object>>> scanEnumAttr(String[] packages, Class<?>[] extendsClass) {
        Map<String, Map<String, Map<String, Object>>> classMapObj = new HashMap<>();
        for (String packagePath : packages) {
            Map<String, Map<String, Map<String, Object>>> stringMapMap = scanEnumAttr(packagePath, extendsClass);
            classMapObj.putAll(stringMapMap);
        }
        return classMapObj;
    }

    /**
     * 从包package中获取所有的Class
     *
     * @param pack 包路径
     * @return MAP
     */
    private static Map<String, Map<String, Map<String, Object>>> scanEnumAttr(String pack, Class<?>[] extendsClass) {
        Gson g = new Gson();
        Map<String, Map<String, Map<String, Object>>> finalMap = new HashMap<>();
        Set<Class<?>> classes = scanClasses(pack, extendsClass);
        for (Class<?> clazz : classes) {
            Map<String, Map<String, Object>> map = new HashMap<>();
            try {
                // 得到enum的所有实例
                Method toName = clazz.getMethod("name");
                Method[] declaredMethods = clazz.getDeclaredMethods();
                Object[] enums = clazz.getEnumConstants();
                for (Object obj : enums) {
                    String enumName = toName.invoke(obj).toString(); //枚举NAME
                    Map<String, Object> declaredMap = new HashMap<>();
                    for (Method declaredMethod : declaredMethods) {
                        String declaredField = ClassUtils.getDeclaredField(declaredMethod);
                        if (declaredField != null) {
                            try {
                                declaredMap.put(declaredField, declaredMethod.invoke(obj));
                            } catch (Exception e) {
                                log.debug("GET method invoke fail", e.getMessage());
                            }
                        }
                    }
                    map.put(enumName, declaredMap);
                }
                finalMap.put(clazz.getSimpleName(), map);
            } catch (NoSuchMethodException | InvocationTargetException | IllegalAccessException e) {
                log.error("扫描包出错", e);
            }
        }
        return finalMap;
    }

    /**
     * 获取枚举类型类
     *
     * @param packagePath 包路径
     * @return 简单名字加对象
     */
    public static Map<String, Map<String, Map<String, Object>>> scanEnumClassMap(String packagePath) {
        return scanEnumAttr(packagePath, new Class[]{Enum.class});
    }

    /**
     * 获取枚举类型类
     *
     * @param packages 包路径
     * @return 简单名字加对象
     */
    public static Map<String, Map<String, Map<String, Object>>> scanEnumClassMap(String[] packages) {
        return scanEnumAttr(packages, new Class[]{Enum.class});
    }


    /**
     * 以文件的形式来获取包下的所有Class
     *
     * @param packageName 包名
     * @param packagePath 包路径
     * @param recursive   是否递归查找
     * @param classes     当前类
     */
    private static void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive, Set<Class<?>> classes) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            // log.warn("用户定义包名 " + packageName + " 下没有任何文件");
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirFiles = dir.listFiles(file -> (recursive && file.isDirectory()) || (file.getName().endsWith(".class")));
        // 循环所有文件
        for (File file : dirFiles) {
            // 如果是目录 则继续扫描
            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "." + file.getName(), file.getAbsolutePath(), recursive,
                        classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0, file.getName().length() - 6);
                try {
                    // 添加到集合中去
                    // classes.add(Class.forName(packageName + '.' +
                    // className));
                    // 经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
                    classes.add(
                            Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    // log.error("添加用户自定义视图类错误 找不到此类的.class文件");
                    e.printStackTrace();
                }
            }
        }
    }
}
